home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / comm / bbs / AnubisPub0551.lha / AnubisPub0551 / ANUBIS-Install < prev    next >
Text File  |  1995-06-24  |  3KB  |  167 lines
  1. ; Installer-Skript für das ANUBIS Mailbox-System
  2. ; ©1993-95; Olli Graf - T.O.M. Software Wuppertal
  3. ; Dieses Skript ist für ANUBIS Public-Version 0.551
  4.  
  5. (set instpfad
  6.     (askdir
  7.         (prompt "Wo soll das Verzeichnis für ANUBIS\nangelegt werden ?")
  8.         (help @askdir-help)
  9.         (default "Work:")
  10.     )
  11. )
  12.  
  13. (makedir (tackon instpfad "Anubis")(infos))
  14. (set instpfad (tackon instpfad "Anubis"))
  15. (set @default-dest instpfad)
  16.  
  17. (makedir (tackon instpfad "Statistik"))
  18. (makedir (tackon instpfad "Guides")(infos))
  19. (makedir (tackon instpfad "AnubisTools")(infos))
  20. (makedir (tackon instpfad "Config"))
  21. (makedir (tackon instpfad "Config/Mailer"))
  22. (makedir (tackon instpfad "Config/MIDs"))
  23. (makedir (tackon instpfad "UserDirs"))
  24. (makedir (tackon instpfad "UserDirs/GAST"))
  25. (makedir (tackon instpfad "UserDirs/SYSOP"))
  26. (makedir (tackon instpfad "Batchs"))
  27. (makedir (tackon instpfad "libs"))
  28. (makedir (tackon instpfad "OnlinePrg")(infos))
  29.  
  30. (copyfiles
  31.     (prompt "installiere Hauptprogramm")
  32.     (help @copyfile-help)
  33.     (source "ANUBIS")
  34.     (infos)
  35.     (dest instpfad)
  36. )
  37.  
  38. (complete 10)
  39.  
  40. (set config
  41.     (askbool
  42.         (prompt "Beispiel-Config installieren ?\nAchtung : Bestehende Daten gehen verloren !")
  43.         (help @askbool-help)
  44.         (choices "Ja" "Nein")
  45.         (default 0)
  46.     )
  47. )
  48.  
  49. (if (= config 1)
  50.     (
  51.      (copyfiles
  52.         (help @copyfiles-help)
  53.         (source "Daten")
  54.         (dest    (tackon instpfad "Daten"))
  55.         (pattern "#?")
  56.         (files)
  57.      )
  58.      (copyfiles
  59.         (help @copyfiles-help)
  60.         (source "Config")
  61.         (dest    (tackon instpfad "Config"))
  62.         (all)
  63.      )
  64.     )
  65. )
  66.  
  67. (copyfiles
  68.     (prompt    "kopiere Textfiles")
  69.     (help @copyfiles-help)
  70.     (source    "Texte")
  71.     (dest    (tackon instpfad "Texte"))
  72.     (pattern "#?")
  73.     (files)
  74. )
  75.  
  76. (copyfiles
  77.     (prompt    "kopiere hilfstexte")
  78.     (help @copyfiles-help)
  79.     (source    "hilfstexte")
  80.     (dest    (tackon instpfad "hilfstexte"))
  81.     (pattern "#?")
  82.     (files)
  83. )
  84.  
  85. (complete 20)
  86.  
  87. (copyfiles
  88.     (prompt    "kopiere Libraries")
  89.     (help @copyfiles-help)
  90.     (source    "libs")
  91.     (dest    (tackon instpfad "libs"))
  92.     (pattern "#?")
  93.     (files)
  94. )
  95.  
  96. (complete 30)
  97.  
  98. (copyfiles
  99.     (prompt    "kopiere AnubisTools")
  100.     (help @copyfiles-help)
  101.     (source    "AnubisTools")
  102.     (dest    (tackon instpfad "AnubisTools"))
  103.     (pattern "#?")
  104.     (files)
  105. )
  106.  
  107. (complete 40)
  108.  
  109. (copyfiles
  110.     (prompt "installiere OnlineProgramme")
  111.     (help @copyfiles-help)
  112.     (source    "OnlinePrg")
  113.     (dest    (tackon instpfad "OnlinePrg"))
  114.     (pattern "#?")
  115.     (files)
  116. )
  117.  
  118. (complete 50)
  119.  
  120. (copyfiles
  121.     (prompt "installiere Anleitungen")
  122.     (help @copyfile-help)
  123.     (source "Guides")
  124.     (dest    (tackon instpfad "Guides"))
  125.     (pattern "#?")
  126.     (infos)
  127.     (files)
  128. )
  129.  
  130. (complete 60)
  131.  
  132. (copyfiles
  133.     (prompt "installiere Batchs")
  134.     (help @copyfile-help)
  135.     (source "Batchs")
  136.     (dest    (tackon instpfad "Batchs"))
  137.     (pattern "#?")
  138.     (files)
  139. )
  140.  
  141. (complete 70)
  142.  
  143. (copyfiles
  144.     (prompt "installiere MUI CustomClasses")
  145.     (help @copyfile-help)
  146.     (source "libs/mui")
  147.     (dest    "MUI:libs/mui")
  148.     (pattern "#?")
  149.     (files)
  150. )
  151.  
  152. (complete 80)
  153.  
  154. (startup "Anubis"
  155.     (prompt "ANUBIS Kommandos in \"s:user-startup\" aufnehmen ?")
  156.     (help @startup-help)
  157.     (command "Assign Anubis: "instpfad" DEFER\n")
  158.     (command "Path Anubis: Anubis:AnubisTools ADD\n")
  159.     (command "Assign libs: Anubis:libs ADD\n")
  160. )
  161.  
  162. (complete 90)
  163.  
  164. (message "Bitte denken Sie daran,\ndie Systempasswörter zu ändern !")
  165.  
  166. (complete 100)
  167.